home *** CD-ROM | disk | FTP | other *** search
/ Mesolore / Mesolore - Disc 1.iso / pc / data / Selden Search.dir / 00009_Script_9 < prev    next >
Text File  |  2001-03-05  |  466b  |  18 lines
  1. on mouseUp
  2.   put "" into field "output"
  3.   put "" into temp
  4.   DropListData = ""
  5.   DropListData = sendAllSprites (#DropList_Selection, [:])
  6.   repeat with x in DropListData
  7.     set holder = the text of x
  8.     if holder <> "" then
  9.       repeat while the last char of holder = " "
  10.         delete the last char of holder
  11.       end repeat
  12.       put holder &  "," after temp
  13.     end if
  14.   end repeat
  15.   delete the last char of temp
  16.   search temp
  17.   put temp
  18. end